MB_DATA:ExtFiles/pack

Bei dieser Datei handelt es sich um ein Skript (s-Bit!) oder ein Programm, das als Argumente den Namen eines Verzeichnisses (Directories) und einer Datei übergeben bekommt. Das Verzeichnis soll in die Datei gepackt werden. Falls das verwendete Pack-Programm nicht eine Datei mit exakt dem vorgeschriebenen Datei-Namen erzeugt, muß die Datei ggf. vor Verlassen des Skripts (oder des Programms) umbenannt werden. Zusätzlich kann vor dem Packen auch die Größe des Verzeichnisses überprüft werden, und falls das Verzeichnis zu groß ist, wird es nicht gepackt und die Datei mit dem übergebenen Namen gelöscht. Die Mailbox erkennt das und gibt eine entsprechende Meldung an den Benutzer aus.

Folgendermaßen könnte ein entsprechendes Skript aussehen:

    .KEY directory/A,tofile/A
    .BRA {
    .KET }

    ;
    ; Calculate size of directory
    ; ( DU is included in MB:C )
    ;

    If `MB:C/Du -S "{directory}"` GT 2000 VAL
        ; sorry, too large
        Delete "{tofile}"
    Else
        ; okay, let's pack it
        LhA -a -A -b64 -e -P-1 -r -x a "{tofile}" "{directory}"
        ;Rename "{tofile}.lha" "{tofile}"
    EndIf